#include <string.h>
#include <keywords.h>

char *keywords[] {
  "BEGIN",
  "PROGRAM",
  "PROCEDURE",
  "FUNCTION",
  "VAR",
  "INTEGER",
  "REAL",
  "IF",
  "THEN",
  "ELSE",
  "WHILE",
  "DO",
  "REPEAT",
  "UNTIL",
  "OR",
  "AND",
  "NOT",
  "MOD",
  "DIV",
  "TO",
  "DOWNTO",
  "GOTO",
  "FOR",
  "FALSE",
  "CASE",
  "CHAR",  
  "END"
};

iskeyword(char const *symbol)
{
  int i;
  for(i=BEGIN; i <= END; i++){
    if(strcasecmp(keywords[i-BEGIN], symbol)==0)
      return i;
  }
  return 0;
}